home *** CD-ROM | disk | FTP | other *** search
/ Atari Forever 4 / Atari Forever 4.zip / Atari Forever 4.iso / PD_THEMA / EPSON / DRUCKER / LESMICH.LST < prev   
File List  |  1998-03-14  |  19KB  |  500 lines
  1. ' ***************************************************************************
  2. ' * Anleitung zum Programm                                    23.03.1989    *
  3. ' ***************************************************************************
  4. ' * ------- Druckereinstellung für den Seikosha SP 1000 A  Drucker -------- *
  5. ' ***************************************************************************
  6. ' * müsste auch auf Epson kompatiplen Druckern funktionieren.               *
  7. ' ***************************************************************************
  8. ' * Dieses Programm ist frei kopierbar                    (Public Domain)   *
  9. ' ***************************************************************************
  10. ' * (c) 1989 by Siegfried Hübner, Obere Vorstadt 21, 8812 Windsbach         *
  11. ' ***************************************************************************
  12. '
  13. '
  14. '                             Vorgeschichte
  15. '                             -------------
  16. '
  17. ' Dieses Programm wurde von mir geschrieben, da ich es satt hatte, wegen
  18. ' jeden Computerausdruck ein Textverarbeitungsprogramm einzuladen.
  19. '
  20. ' Das Programm wurde auf einen Atari 520 ST+ mit s/w Atari Monitor SM 124
  21. ' und Philips CM 8833 Farbmonitor in der mittleren Auflösung geschrieben.
  22. '
  23. ' Dieses Programm läuft somit auf jeden Atari ST Computer in s/w sowie
  24. ' in color in der mittleren Auflösung.
  25. '
  26. ' Dieses Text wurde allerdings mit dem GFA-Basic Interpreter geschrieben
  27. ' toll nicht war. Mein Programm allerdings auch.
  28. '
  29. ' Listing des Programms in GFA - Basic auf Anfrage erhältlich
  30. '
  31. '
  32. '                          Programmtechnisches
  33. '                          -------------------
  34. '
  35. ' Bei Farbmonitor bitte auf mittlere Auflösung umschalten.
  36. ' Funktioniert natürlich auch auf einen sw Monitor.
  37. '
  38. ' Zu Beginn des Programmstartes, ist es gut, wenn man den Drucker schon
  39. ' einmal einschaltet.
  40. '
  41. ' Der Zeichensatz wird zu Beginn des Programmstartes automatisch vom
  42. ' Programm auf Deutsche Zeichen (Umlaute usw. eingestellt.)
  43. ' um auch die Sonderzeichen richtig auszudrucken. Sollten Sie einen
  44. ' anderen Zeichensatz benötigen, so können Sie Ihn ja bei Menüpunkt
  45. ' S = Zeichensatz einstellen. (Erklärung dazu folgt später.)
  46. '
  47. ' Bei Programmstart wird die Hardcopyroutine automatisch auf 960
  48. ' Punkte eingestellt.
  49. '
  50. ' Es wurde auserdem eine gute Fehlerabfangroutine eingebaut die
  51. ' bei Fehleingaben des Bedieners, das Programm erneut startet.
  52. ' ( Ade du schöner Absturz)
  53. '
  54. '                       Erklärung des Hauptmenüs
  55. '                       ------------------------
  56. '
  57. ' Es können Klein oder auch Großbuchstaben eingegeben werden (egal was)
  58. ' Bitte immer den Aufangsbuchstaben vor dem = Zeichen eingeben.
  59. '
  60. ' *************************************************************************
  61. ' *    A = Druckbefehl                                                    *
  62. ' *************************************************************************
  63. '
  64. ' Durch den Eingeben des Buchstabens A
  65. ' kommt folgendes Auswahlmenü.
  66. '
  67. ' A = Zeilenvorschub                         = schiebt 1 Zeile nach oben
  68. ' B = Seitenvorschub                         = schiebt 1 Seite nach oben
  69. ' C = Vertikaltabulatoren Zeilenvorschub
  70. ' D = Zeilenvorschub       um n/216 Zoll
  71. ' E = Zeilenrücktransport  um n/216 Zoll
  72. '
  73. ' F = Zum Hauptmenü                          = zurück zum Hauptmenü
  74. '
  75. '
  76. ' ************************************************************************
  77. ' *    B = Schrifttyp                                                    *
  78. ' ************************************************************************
  79. '
  80. ' Hier kan die Schriftart eingestellt werden.
  81. '
  82. ' Durch die Eingabe des Buchstabens B
  83. ' kommt folgendes Auswahlmenü.
  84. '
  85. ' A = Elite ein
  86. ' B = Elite aus
  87. ' C = Schmallschrift ein
  88. ' D = Schmallschrift aus
  89. ' E = Hohe Druckqualität ein
  90. ' F = Hohe Druckqualität aus
  91. ' G = Proportionaldruck ein
  92. ' H = Proportionaldruck aus
  93. ' I = Ausdruck hochgestellt ein
  94. ' J = Ausdruck tiefgestellt ein
  95. ' K = Hoch-Tiefstellung aus
  96. ' L = Italic ein
  97. ' M = Italic aus
  98. ' N = Festlegen der Druckart
  99. ' Q = Fettdruck ein
  100. ' P = Fettdruck aus
  101. ' Q = Ausdruck mit doppelter Anschlagstärke
  102. ' R = Beendigung des Ausdrucks mit doppelter Anschlagstärke
  103. '
  104. ' S = Zurück zum Hauptmenü
  105. '
  106. '
  107. ' **************************************************************************
  108. ' *  C = Ausdruck mit doppelter Zeichenbreite                              *
  109. ' **************************************************************************
  110. '
  111. ' Durch die Eingabe des Buchstabens C
  112. ' kommt folgendes Auswahlmenü.
  113. '
  114. ' A = Ausdruck mit doppelter Zeichenbreite
  115. '     Befehl wird durch Zeilenvorschub beendet.
  116. ' B = Beenden von Position A
  117. ' C = Ausdruck mit doppelter Zeichenbreite
  118. '     (Befehl wird durch Zeilenvorschub nicht beendet)
  119. ' D = Beenden von Position C
  120. '
  121. ' E = Zum Hauptmenü
  122. '
  123. '
  124. ' **************************************************************************
  125. ' * D = Grafikdruck und Hardcopyausdruck                                   *
  126. ' **************************************************************************
  127. '
  128. ' Durch die Eingabe des Buchstabens D
  129. ' kommt folgendes Auswahlmenü.
  130. '
  131. ' A = Standard Grafikdruck
  132. ' B = Grafikdruck mit doppelter Dichte
  133. ' C = Grafikdruck mit doppelter Dichte und
  134. '     doppelter Druckgeschwindigkeit
  135. ' D = Grafikdruck mit vierfacher Dichte
  136. ' E = Verschiedene Grafikdruckarten
  137. ' F = 9-Pin-Grafikdruck
  138. '
  139. ' Die Funktionen A-F bitte selbst Ausprobieren
  140. ' vielleicht kann mir jemand schreiben oder sagen wie diese Funktionen
  141. ' funktionieren.
  142. '
  143. ' ----------------- jetzt kommen die Hardcopyeinstellungen -------------
  144. '
  145. ' G = Hardcopyeinstellung  960 Punkte        (Einstellung für den Drucker)
  146. ' H = Hardcopyeinstellung 1280 Punkte
  147. '
  148. ' I = Hauptmenü
  149. '
  150. ' Erklärung bitte beim Seikosha SP 1000 A Drucker bei Hardcopyausdruck auf
  151. ' 960 Punkte einstellen = Position G
  152. '
  153. '
  154. ' **************************************************************************
  155. ' *  E = Zeilenabstand                                                     *
  156. ' **************************************************************************
  157. '
  158. ' Durch die Eingabe des Buchstabens E
  159. ' kommt folgendes Auswahlmenü.
  160. '
  161. ' A = Zeilenabstand               1/ 8  Zoll
  162. ' B = Zeilenabstand               7/72  Zoll
  163. ' C = Zeilenabstand               1/ 6  Zoll
  164. ' D = Einstellung Zeilenabstand   n/216 Zoll
  165. ' E = Einstellung Zeilenabstand   n/72  Zoll
  166. '
  167. ' F = Zum Hauptmenü
  168. '
  169. '
  170. ' ***************************************************************************
  171. ' * F = Seitenlänge                                                         *
  172. ' ***************************************************************************
  173. '
  174. ' Durch die Eingabe des Buchstabens F
  175. ' kommt folgendes Auswahlmenü.
  176. '
  177. ' A = Einstellung der Seitenlänge in Zeileneinheiten
  178. ' B = Einstellung der Seitenlänge in Zolleinheiten
  179. '
  180. '
  181. ' ***************************************************************************
  182. ' * G = Horizontaltabulator                                                 *
  183. ' ***************************************************************************
  184. '
  185. ' Durch die Eingabe des Buchstabens G
  186. ' kommt folgendes Auswahlmenü.
  187. '
  188. ' A = Setzen des Horizontaltabulators
  189. ' B = Bewegen zur nächsten Tabulatorposition
  190. '
  191. ' C = Zum Hauptmenü
  192. '
  193. '
  194. ' ***************************************************************************
  195. ' * H = Randeinstellung                                                     *
  196. ' ***************************************************************************
  197. '
  198. ' Durch die Eingabe des Buchstabens H
  199. ' kommt folgendes Auswahlmenü.
  200. '
  201. ' A = Rechten Rand setzen
  202. ' B = Linken  Rand setzen
  203. '
  204. ' C = Zum Hauptmenü
  205. '
  206. '
  207. ' ****************************************************************************
  208. ' * I = Unterstreichen                                                       *
  209. ' ****************************************************************************
  210. '
  211. ' Durch die Eingabe des Buchstabens I
  212. ' kommt folgendes Auswahlmenü.
  213. '
  214. ' A = Unterstreichen ein
  215. ' B = Unterstreichen aus
  216. '
  217. ' C = Zum Hauptmenü
  218. '
  219. '
  220. ' *****************************************************************************
  221. ' * J = Puffer löschen                                                        *
  222. ' *****************************************************************************
  223. '
  224. ' Durch Eingabe von J wird der Puffer gelöscht.
  225. '
  226. ' *****************************************************************************
  227. ' * K = Rückschritt                                                           *
  228. ' *****************************************************************************
  229. '
  230. ' *****************************************************************************
  231. ' * L = Summer                                                                *
  232. ' *****************************************************************************
  233. '
  234. ' Durch Eingabe von L gibt der Drucker einen Pips aus.
  235. '
  236. ' *****************************************************************************
  237. ' * M = Ausgangsposition                                                      *
  238. ' *****************************************************************************
  239. '
  240. ' Durch Eingabe von M wird der Drucker in die Ausgangsposition versetzt.
  241. '
  242. ' *****************************************************************************
  243. ' * N = Zeilensprung                                                          *
  244. ' *****************************************************************************
  245. '
  246. ' Durch die Eingabe des Buchstabens N
  247. ' kommt folgendes Auswahlmenü.
  248. '
  249. ' A = Überspringen von n-Zeilen am Seitenende
  250. ' B = Ende der Srungfunktion
  251. '
  252. ' C = Zum Hauptmenü
  253. '
  254. '
  255. ' ****************************************************************************
  256. ' * Q = Papier-Erkennungs-Funktion                                           *
  257. ' ****************************************************************************
  258. '
  259. ' Durch die Eingabe des Buchstabens Q
  260. ' kommt folgendes Auswahlmenü.
  261. '
  262. ' A = Papier-Erkennungsfunktion nicht wirksam
  263. ' B = Papier-Erkennungsfunktion       wirksam
  264. '
  265. ' C = Zum Hauptmenü
  266. '
  267. '
  268. ' ************************************************************************
  269. ' * P = Rückstellung                                                     *
  270. ' ************************************************************************
  271. '
  272. ' ************************************************************************
  273. ' * Q = Löschen                                                          *
  274. ' ************************************************************************
  275. '
  276. ' ************************************************************************
  277. ' * R = Ausdruck in einer Richtung                                       *
  278. ' ************************************************************************
  279. '
  280. ' Durch die Eingabe des Buchstabens R
  281. ' kommt folgendes Auswahlmenü.
  282. '
  283. ' A = Ausdruck in eine Richtung
  284. ' B = Bildirektionaler Ausdruck
  285. '
  286. ' C = Zum Hauptmenü
  287. '
  288. '
  289. ' ************************************************************************
  290. ' * S = Zeichensatz                                                      *
  291. ' ************************************************************************
  292. '
  293. ' Beim Einschalten dieses Programms wird automatisch auf Deutschen
  294. ' Zeichensatz umgeschalten.
  295. '
  296. ' Durch die Eingabe des Buchstabens S
  297. ' kommt folgendes Auswahlmenü.
  298. '
  299. '   0 = USA
  300. '   1 = Frankreich
  301. '   2 = Deutschland
  302. '   3 = Großbritanien
  303. '   4 = Dänemark
  304. '   5 = Schweden
  305. '   6 = Italien
  306. '   7 = Spanien
  307. '   8 = Japan
  308. '   9 = Norwegen
  309. '  10 = Dänemark II
  310. '
  311. ' Bitte wählen Sie hier Ihren Zeichensatz aus.
  312. ' Zahl von 0-10 eingeben.
  313. '
  314. '
  315. ' **************************************************************************
  316. ' * T = Vertikal Tabulatoren                                               *
  317. ' **************************************************************************
  318. '
  319. ' Durch die Eingabe des Buchstabens T
  320. ' kommt folgendes Auswahlmenü.
  321. '
  322. ' A = Vertikaltabulatoreinstellung
  323. ' B = Vertikaltabulatoreinstellung pro Kanal
  324. ' C = Kanalwahl des Vertikaltabulators
  325. '
  326. ' D = Zum Hauptmenü
  327. '
  328. '
  329. ' **************************************************************************
  330. ' * U = Druckerwahl                                                        *
  331. ' **************************************************************************
  332. '
  333. '
  334. ' Durch die Eingabe des Buchstabens U
  335. ' kommt folgendes Auswahlmenü.
  336. '
  337. ' A = Drucker einschalten
  338. ' B = Drucker ausschalten
  339. '
  340. ' C = Zum Hauptmenü
  341. '
  342. '
  343. ' ****************************************************************************
  344. ' * V = Frei programmierbare Zeichen                                         *
  345. ' ****************************************************************************
  346. '
  347. '
  348. ' Durch die Eingabe des Buchstabens V
  349. ' kommt folgendes Auswahlmenü.
  350. '
  351. ' A = Wahl des Rom-Zeichensatzes
  352. ' B = Wahl der im Ram gespeicherten frei programmierbaren Zeichen
  353. ' C = Rom Zeichensatz in den RAM kopieren
  354. ' D = Definition der frei programmierbaren Zeichen
  355. ' E = Definition der Druckerzeichen im Steuerbereich
  356. ' F = Löschen der festgelegten Steuerzeichen.
  357. '
  358. ' G = Zum Hauptmenü
  359. '
  360. ' Wie diese Befehle genau Funktionieren weiß ich noch nicht genau.
  361. ' Bitte selbst ausprobieren. (Vielleicht kann mir mal einer Schreiben
  362. ' und sagen wie man selber Zeichen definiert in GFA-Basic.
  363. '
  364. ' *************************************************************************
  365. ' * W = Steuerung der Eingabedaten                                        *
  366. ' *************************************************************************
  367. '
  368. '
  369. ' Durch die Eingabe des Buchstabens W
  370. ' kommt folgendes Auswahlmenü.
  371. '
  372. '
  373. ' A = MSB der Eingabe ist  0
  374. ' B = MSB der Eingabe ist  1
  375. ' C = Max 8 Bit pro Datum
  376. '
  377. ' D = Zum Hauptmenü
  378. '
  379. ' Bitte schreiben Sie mir was es sich mit den Funktionen A-C auf sich hat.
  380. '
  381. ' ***************************************************************************
  382. ' * X = Vergrößern des Druckerbefehlsbereichs                               *
  383. ' ***************************************************************************
  384. '
  385. '
  386. ' Durch die Eingabe des Buchstabens X
  387. ' kommt folgendes Auswahlmenü.
  388. '
  389. '
  390. ' A = Festlegung des Druckerbefehlsbereichs
  391. ' B = Löschen des Druckerbefehlsbereichs
  392. '
  393. ' C = Zum Hauptmenü
  394. '
  395. ' Über einen Brief von Ihnen was die Funktionen A und B bedeuten würde
  396. ' Ich mich freuen.
  397. '
  398. ' ***************************************************************************
  399. ' * Y = Lade/Drucke  Text                                                   *
  400. ' ***************************************************************************
  401. '
  402. '
  403. ' Bei Programmstart wird das Programm automatisch auf Deutschen Zeichensatz
  404. ' eingestellt. Also Deutsche Umlaute werden richtig gedruckt.
  405. '
  406. ' Durch die Eingabe des Buchstabens Y
  407. ' kommt folgende Alertbox auf dem Bildschirm
  408. '
  409. ' Wollen Sie die ' Zeilen löschen beim Drucken oder normal Drucken.
  410. '
  411. ' Wenn Sie die ' Zeichen löschen wollen , ist interesant, wenn Sie
  412. ' Ihren Text mit dem GFA Basic Interpreter schreiben.
  413. ' Dann bitte Ihren Text als LST Text abspeichern .
  414. ' Die ' Zeichen werden dann automatisch durch Leerzeichen ersetzt.
  415. '
  416. ' Sie können dieses Text ja einmal mit der obigen Funktion
  417. ' ausdrucken.
  418. '
  419. ' Bei der Auswahl normal Drucken wird der Text normal gedruckt
  420. ' Die Zeilen mit ' werden dann auch als ' Zeichen gedruckt.
  421. '
  422. ' **************************************************************************
  423. ' * # = Test Druck                                                         *
  424. ' **************************************************************************
  425. '
  426. ' Druckt einen bestimmten Text zum Testen der Einstellungen.
  427. '
  428. ' **************************************************************************
  429. ' * Z = Programmende                                                       *
  430. ' **************************************************************************
  431. '
  432. ' zum Verlassen des Prgramms.
  433. ' Durch Eingabe von Z wird das Programm beendet.
  434. '
  435. ' **************************************************************************
  436. '
  437. '
  438. ' sollte einmal der Drucker verstellt sein, nicht mehr Drucken. Hilft meißt
  439. ' ein Aus und wiedereinschalten des Druckers.
  440. '
  441. ' Sollten Sie Fehler, Verbesserungsvorschläge, Tips und Tricks usw. zu
  442. ' diesem Programm haben oder gefunden haben.
  443. '
  444. ' So wäre ich Ihnen für eine Mitteilung sehr Dankbar.
  445. '
  446. ' Sollten Sie einen anderen Drucker besitzen, und nichts mit diesem
  447. ' Programm anfangen können. So passe Ich Ihnen gerne mein Programm
  448. ' an Ihren Drucker auf Anfrage an. (Soweit es mir möglich ist.)
  449. '
  450. ' In diesem Programm steckt viel Arbeit.
  451. '
  452. ' Alle die dieses Programm benützen, und es gebrauchen können, die
  453. ' können mir ja ein kleines Anerkennungshonorar zukommen lassen.
  454. '
  455. ' Sollte diese Bitte zu wenig Anklang bei Ihnen finden, werden keine
  456. ' weiteren Public Domain Programme mehr von mir erscheinen.
  457. '
  458. ' -------------------------------------------------------------------------
  459. ' Meine Adressse              Siegfried Hübner
  460. '                             Obere Vorstadt 21
  461. '                             8812 Windsbach
  462. ' -------------------------------------------------------------------------
  463. '
  464. ' Einen Dicken Gruß an alle Atari ST Fans
  465. ' und steckt nicht euer ganzes Geld in teure
  466. ' Programme, sondern Unterstützt auch einmal
  467. ' arme Hobbyprogrammierer mit einen kleinen
  468. ' Anerkennungshonorar.
  469. '
  470. '
  471. ' PS:  Dieses Programmm ist (Public Domain) also frei kopierbar.
  472. '      Und sollte auch fleisig kopiert werden, um sich möglichst
  473. '      weit zu verbreiten.
  474. '
  475. ' Für Fehler im Programm kann keine Haftung übernommen werden.
  476. ' Bei Entdecken einen Fehlers, mir bitte sofort schreiben. Damit
  477. ' Ich den Fehler beheben kann.
  478. '
  479. ' Bei Anfragen von Ihnen bitte Rückporto beilegen.
  480. ' Ich bin zur Zeit Arbeitslos und schlecht bei Kasse
  481. ' und besitze noch keinen Geldesel.
  482. '
  483. ' --------------------------------------------------------------------------
  484. ' Umfrage
  485. ' --------
  486. ' Ich schreibe zur Zeit an einem Adressenverwaltungsprogramm für den
  487. ' Atari ST. Besteht überhaupt Interesse an einem solchen Programm
  488. ' als PD Programm oder nicht.  ??????
  489. '
  490. ' Was haltet Ihr von einen CNC-Programm für den Atari ST ??????
  491. '
  492. ' Diese Programme werden nur bei genügender Resonanz von Ihnen
  493. ' weiterentwickelt.(Bitte schreibt mir was Ihr davon haltet.
  494. ' und was ein solches Programm alles können muß.
  495. '
  496. ' ----------------------------------------------------------------------------
  497. ' Bis bald und schreibt doch auch einmal ein Public Domain Programm
  498. ' für den Atari ST.
  499. '
  500.